home *** CD-ROM | disk | FTP | other *** search
/ Secret Rendez-vous / Secret Rendez-vous.iso / pc / starware.exe / starware.DXR / 00030_SoundHigh.ls < prev    next >
Encoding:
Text File  |  1995-05-02  |  215 b   |  11 lines
  1. on mouseDown
  2.   global soundSetting
  3.   puppetSound("mouse down")
  4.   repeat while the stillDown
  5.     updateStage()
  6.   end repeat
  7.   puppetSound(0)
  8.   set soundSetting to 256
  9.   set the volume of sprite 3 to soundSetting
  10. end
  11.